integer
GetResourceAmount
then
set
else
set
endif
then
then
GetResourceAmount
else
set
endif
endif
SetResourceAmount
